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/* 

= Emotion Engine Library Sample Program 

* 

] - <pad> - 

* 

* Version 0.10 

* Shift-JISs 

* 

* Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 

i All Rights Reserved. 

* 

a main.c 

* read pad data 

* 

- Version Date Design Log 
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us 0.10 Mar,26,1999 ywashizu structure/macro 
*/ 


#include <eekernel .h> 
#include <eeregs.h> 
#include <sifdev.h> 
#include <libgraph.h> 
#include <stdio.h> 


/* Read two pads and remove comments */ 
/* #define PADS */ 


int main() 
{ 
int fd,i; 


/* GS initialization */ 
// sceGsResetGraph(0, SCE_GS_INTERLACE, SCE_GS_NTSC, SCE_GS_FRAME) ; 


/* pad initialization */ 
#ifdef PADS 


fd = sceOpen("pads:", SCE_RDONLY | SCE_NOWBDC) ; 


/* When reading 1 */ 


fd = sceOpen("pad:", SCE_RDONLY | SCE_NOWBDC) ; 
fendif 
while(1) { 


/* Suitable wait time */ 
i = 0x400000; 
while(i --) ; 


/* Obtain pad data */ 
sceRead(fd, (void *) &pd, sizeof (pd)); 


/* Display pad data */ 
printf("cnt %d status %x ",pd.cnt,pd.status); 


if ((pd.status & Oxff) == SCE_PAD_ANALOG) 
printf("buttonl %x ana %x %x %x %x ", 
pd.button, pd.r3h,pd.r3v,pd.13h,pd.13v); 
else if ((pd.status & Oxff) == SCE_PAD NORMAL) 
printf("buttonl %x ", pd.button); 


if (((pd.status >> 8) & Oxff) == SCE_PAD_ANALOG ) 
print£("button2 %x ana %x %x %x %x ", 
pd.button2, pd.r3h2,pd.r3v2,pd.13h2,pda.13v2) ; 
else if (((pd.status >> 8) & Oxff) == SCE_PAD NORMAL ) 
printi("button2 %x ", pd.button2); 


printt("\n"); 


} 


sceClose(fd); 


/* _ main(){} */ 


} 
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*/ 

/* 

~ Emotion Engine Library Sample Program 
* 

7 - bspline - 

* 

* Version 0.3.0 

* Shift-JIs 

* 

* Copyright (C) 1998-1999 Sony Computer Entertainment Inc. 
* All Rights Reserved. 

* 

* Name : main.c 

id Description : main procedure 

* 

* 


Version Date 


* 


* 
Oo 
Ww 
Oo 


Jun,1,1999 
*/; 


#include <eekernel .h> 
#include <eeregs.h> 
#include <libgraph.h> 
#include <libdma.h> 
#include <libdev.h> 
#include <math.h> 
#include <stdlib.h> 
#include <sifdev.h> 
#include <libvu0.h> 


#include "noise.h" 


first version 


extern unsigned int My_dma_setting __attribute__((section(".vudata") ) 


extern unsigned int My_dma_start1 __attribute__((section(".vudata"))); 
extern unsigned int My_dma_start2 __attribute__((section(".vudata"))); 


extern unsigned int My_reftag __attribute__((section(".vudata"))); 
extern unsigned int My_light __attribute__((section(".vudata"))); 


extern float B_matrix[] __attribute__((section(".vudata"))); 
extern unsigned int B_blending[] __attribute__((section(".vudata"))); 
extern unsigned int My_bspline_start __attribute__((section(".vudata"))); 


); 
, 
’ 


extern unsigned int My_bspline_end __attribute_ _((section(".vudata"))); 
extern unsigned int My_texturel __attribute__((section(".vudata"))); 


void SetBlendingCoeff (void) ; 
void CreateViewingMatrix (sceVu0FVECTOR, 


void MoveLight (u_int) ; 


// ~--- params for display ---- 
#define SCREEN_WIDTH 640.0f£ 
#define SCREEN_HEIGHT 224.0f 
#define SCREEN_OFFSET_X 1728.0 f 
#define SCREEN_OFFSET_Y 1936.0f 


#define FOV 42.0f 
#define ASPECT 1.42f 
#define PI 3.14159265358979323846f 


// --- param for double buffer --- 
sceGsDBuff db; 
sceGsLoadImage gs_limage, gs_limage2; 


struct { 
sceGifTag giftag; 
sceGsTest gs_test; 


sceVu0FVECTOR, sceVu0FMATRIX) 
void SetViewPosition(sceVu0FVECTOR, float, 
void CreateControlPointArea(u_int, u_int, 
void SetControlPoint(u_int, u_int, u_int, 


u_int, u_int, u_int); 
u_int, u_int, u_int *addr); 


, 


long gs_testladdr; 
sceGsAlphaEnv gs_alpha; 
sceGsTexEnv gs_tex; 


} texenvl, texenv2; 


// --- size of parametric uv --- 
#include "grid.h" 
#include "torus.h" 


// --- double buffer --- 
u_int *cppkt [2]; 
float *cp, *cp_mod; 


int main() 


{ 


int odev, fd; 

u_int i, j, frame, draw_frame; 
u_int index; 

float £, theta, dtheta, phi, £1, fmax, fmin, *offset; 
u_int n_vloop, *reftag; 

u_int n_u, n_v, u_closed, v_closed; 

u_int modelID, modelFlag, shading, toggle; 


sceVu0FVECTOR view; 
sceVu0FVECTOR interest; 
sceVuOFMATRIX viewmat; 


scePadData pad; 


sceGsResetPath(); 
sceGsResetGraph(0, SCE_GS_INTERLACE, SCE_GS_NTSC, SCE_GS_FRAME) ; 


// --- set double buffer --- 
sceGsSetDefDBuff (&db, SCE_GS_PSMCT32, 640, 224, 
SCE_GS_ZGREATER, SCE_GS_PSMZ24, SCE_GS_CLEAR) ; 
*(u_long *)&db.clear0O.rgbag = 
SCE_GS_SET_RGBAQ(0x10, 0x10, 0x10, 0x80, 0x3f£800000); 
*(u_long *)&db.clearl.rgbag = 
SCE_GS_SET_RGBAQ(0x10, 0x10, 0x10, 0x80, 0x3f£800000); 


// --- set load image 1--- 


#define IMAGE_SIZE 256 


sceGsSetDefLoadImage (&gs_limage, 
6715, 
IMAGE_SIZE / 64, 


04-0; 

IMAGE_SIZE, IMAGE_SIZE); 
FlushCache (0) ; 
sceGsExecLoadImage(&gs_limage, (u_long128*) &My_texturel1) ; 
sceGsSyncPath(0, 0); 


// --- set texture env --- 

sceGsSetDefTexEnv (&texenvl.gs_tex, 0, 6715, 
IMAGE SIZE / 64, SCE_GS_PSMCT32, 
8, 8, 0, 0, 0, 0, 1); 

SCE_GIF_CLEAR_TAG (&texenvl .giftag) ; 

texenvl.giftag.NLOOP = 9; 

texenvl.giftag.EOP = 1; 

texenvl.giftag.NREG = 1; 

texenvl.giftag.REGSO = Oxe; 

sceGsSetDefAlphaEnv (&texenvl.gs_alpha, 0); 


*(u_long *) &texenvl.gs_alpha.alphal = SCE_GS_SET_ALPHA(0, 2, 0, 1, 
*(u_long *) &texenvl.gs_test = SCE_GS_SET_TEST(0, 0, 0, 0, O, OQ, 3, 
texenvil.gs_testladdr = (long)SCE_GS_TEST_1; 


FlushCache (0); 
sceGsPutDrawEnv (&texenvl.giftag) ; 
sceGsSyncPath(0, 0); 


interest[0] = 0.0£; 


interest[1] = 0.0€; 
interest[{2] = 0.0€; 
interest[3] = 0.0f; 


FlushCache (0) ; 


// defaults theta 

theta = 0.0f; 

phi = 0.0f; 

dtheta = 2.0f * PI / 180.0£; 


frame = 0; 
draw_frame = 0; 


odev = !sceGsSyncv (0); 
fd = sceOpen("pad:0", 0); 


*D1_QWC 0x00; 

*D1_ TADR (u_int)&My_dma_setting & OxO0fffffff; 
*D STAT = 2; 

FlushCache (0) 


nou 


*D1_CHCR = 1 | (1<<2) | (0<<4) | (1<<6) | (0<<7) | (1<<8); 
sceGsSyncPath(0, 0); 
// --- Set Blending coefficient ---- 
SetBlendingCoeff(); 
modelID = 0; 
modelFlag = 1; 
shading = 1; 
cp_mod = NULL; 
offset = NULL; 
n_u = N_UI; 
n_v = N_V1; 
u_closed = U_CLOSED1; 
v_closed = V_CLOSED1; 
toggle = 0; 
// --- initialize noise --- 
init_noise(); 
£ = 0.0f; 
while(1) { 
// --- change model / change wire/shading --- 
if(modelFlag) { 
if(modelID == 0) { 
// --- create dma data area (single V line set) --- 
modelFlag = 0; 
cp = cpl; 
n_u = N_U1; 
n_v = N_V1; 
u_closed = U_CLOSED1; 


CreateControlPointArea(n_u, n_v, 


if(cp_mod != NULL) free(cp_mod) ; 
cp_mod = (float*) malloc(n_u 
memcpy(cp_mod, cp, n_u * n_v * 4 

if(offset != NULL) free(offset); 


u_closed, v_closed, shading) ; 


* nv * 4 * sizeof(float)); 
* sizeof (float) ); 


offset = (float*) malloc(n_u * n_v * sizeof(float)); 


} else if(modelID == 1) { 


// --- create dma data area (single V line set) --- 
modelFlag = 0; 
cp =.cp2% 
n_u = N_U2; 
nv = N_V2; 


u_closed = U_CLOSED2; 
v_closed = V_CLOSED2; 
CreateControlPointArea(n_u, n_v, 


u_closed, v_closed, shading) ; 


OS 


if(cp_mod != NULL) free(cp_mod); 
cp_mod = (float*) malloc(n_u * n_v * 4 * sizeof(float)); 
memcpy (cp_mod, cp, n_u * n_v * 4 * sizeof(float)); 


if(offset != NULL) free(offset); 
offset = (float*) malloc(n_u * n_v * sizeof(float)); 


sceGsSetHalfoOffset((frame&l) ? &db.drawl : &db.draw0, 2048,2048,odev) ; 
FlushCache (0) ; 
sceGsSwapDBuff(&db, frame) ; 


// --- read pad --- 
sceRead(fd, &pad, sizeof (scePadData) ); 


// --- model change --- 
if(!toggle ) { 
if (pad. button&SCE_PADselect) { 
modelID = (++modelID) & 0x01; 
modelFlag = 1; 
toggle = 1; 
} else if (pad.button&SCE_PADR1) { 
shading = (++shading) & 0x01; 
modelFlag = 1; 


toggle = 1; 
} else if(! (pad.button&SCE_PADselect) && !(pad.button&SCE_PADR1)) { 
toggle = 0; 
} 
// --- theta direction --- 


if (pad.button&SCE_PADLleft) { 
theta += dtheta; 

} else if (pad.button&SCE_PADLright) { 
theta -= dtheta; 


// --- phi direction --- 

if (pad. button&SCE_PADLup) { 
phi += dtheta; 

} else if (pad.button&SCE_PADLdown) { 
phi -= dtheta; 


// --- adjust invalid angle --- 
if(theta > 2.0f * PI) { 

theta = 2.0f£ * PI; 
} else if(theta < 0.0£) { 

theta = 0.0f; 


} 

i£(phi > PI * 0.49f) { 
phi = PI * 0.49f; 

} else if(phi < -PI * 0.49£) { 
phi = -PI * 0.49£; 

} 


SetViewPosition(view, theta, phi); 
MoveLight (frame) ; 


sceGsSyncPath(0, 0); 


// --- Viewing Matrix --- 
CreateViewingMatrix(view, interest, viewmat); 


*D1_QWC 0x00; 
*D1_TADR (u_int)&My_dma_startl & Ox0Offfffff; 
*D STAT = 2; 


eit 


FlushCache (0) ; 
*D1_CHCR = 1 | (1<<2) | (0<<4) | (1<<6) | (0<<7) | (1<<8); 


sceGsSyncPath(0, 0); 


if (v_closed) 
n_vloop 

else 
n_vloop = n_v - 3; 


nv; 


reftag = (u_int*) &My_reftag; 
SetControlPoint(0, n_u, n_v, u_closed, v_closed, cppkt[0]); 
reftag([1] = 0x80000000 | (u_int) cppkt{[0]; 


for(i = 1; i < n_vloop; i++) { 


*D1_Qwc 0x00; 

*D1_TADR (u_int) &My_dma_start2 & Ox0fffffff; 

*D STAT = 2; 

FlushCache (0) ; 

*D1_CHCR = 1 | (1<<2) | (0<<4) | (1<<6) | (0<<7) | (1<<8); 


SetControlPoint(i, n_u, n_v, u_closed, v_closed, cppkt[i%2]}); 
reftag[1] = 0x80000000 | (u_int) cppkt[i%2]; 
sceGsSyncPath(0, 0); 


*D1_QWC = 0 
*DI1_TADR = ( 
*D_STAT = 2; 
FlushCache (0); 
*D1_CHCR = 1 | (1<<2) | (0<<4) | (1<<6) | (0<<7) | (1<<8); 


x00; 
u_int)&My_dma_start2 & OxOfffffff; 


// --- deformation test --- 
f += 0.20£; 
= 0.0f; 
= 1000000.0£; 
for(j = 0; j < nv; j++) { 
for(i = 0; i < n_u; i++) { 
index = ((j * n_u) + i); 
offset [index] = turbulence((float)i, (float)j, £); 
if(fmax < offset{index]) fmax = offset [index]; 
if(fmin > offset({index]) fmin = offset [index]; 


} 
} 
£1 = fmax - fmin; 
for(j = 0; j < n_v; jtt) f{ 
for(i = 0; i < n_u; i++) { 
index = ((j * n_u) + i) * 4 + 14; 
cp_mod[index] = cp[index] + 5.0f * ((offset[(j * n_u) + i] - fmin) / f1 - 0.5€); 
} 
} 
frame++; 
odev = !sceGsSyncv (0); 
} 


#define N_DIV 4 
void SetBlendingCoeff(void) { 


float B{16], BN[16], til, t2, t3, fwidth, *fBlending; 


float ST[4]; 
u_int i, k, index, 
fwidth = 
index = 0 
index2 = 


1.0£ / 
0; 


i < N_DI 


for(i = 
tl = 


0; 

fwidth 
t2 = tl 
t3 = t2 


* # ¥f 
ct 


B(index++] = ( 
B(index++] = ( 
B[lindex++] 
Blindex++] 


BN [index2++] 
BN [index2++] 
BN [index2++] 
BN [index2++] 


nou wou 


} 


ST{O] 
st[1] 
ST[2] 
ST [3] 


0.0€; 
0.3333333£; 
0.6666666f; 
1.0€; 


Wo We a 


fBlending = 
0; 


(float* 


for(i = 0; i < 4; i 
£Blending [k++] 

for(i = 0; i < 4; i 
fBlending [k++] 


for(i = 0; i< 4; i 
fBlending [k++] 

for(i = 0; i < 4; i 
fBlending [k++] 


£Blending[k ] 
fBlending[k + 1] 
fBlending[k + 2] 
k += 4; 


frou 


// --- (1, 0) --- 
for(i = 0; i < 4; i 
fBlending [k++] 
for(i = 0; i < 4; i 
fBlending [k++] 
for(i = 0; i < 4; i 
£Blending [k++] 
for(i = 0; i < 4; i 
£Blending [k++] 


fBlending[k J 
fBlending[k + 1] 
fBlending[k + 2] 
k += 4; 


Wet tt 


// --- (0, 1) --- 
for(i = 0; i < 4; i 
fBlending [k++] 
for(i = 0; i < 4; 1 
£Blending [k++] 
for(i = 0; i < 4; i 
£Blending [k++] 
for(i = 0; i < 4; i 
£Blending [k++] 


index2; 


(N_DIV - 1); 


V; itt) { 


- 3° 4..3. * t2---.°3 
3 * t3 - 6 * t2 
= (-3 * t3 + 3 * t2 
= ( t3 


(53°) 208 (6 EL 
(59° 4-62, =: 22) * C1 
(- 9 * t2 + 6 * tl 
(. 3. * £2 


) &B_blending; 


++) 
= BN[i + 0 * 


++) 
= B [i+ 0 * 
++) 
= BN[i + 0 * 


4]; 
4]; 


ST[O]; 
ST[0O); 
10£; 


++) 
=B[i+1* 
++) 
= BN[i + 1 * 


4]; 
4]; 


++) 
= B [i+ 0 * 
++) 
= BN[i + 0 * 


4]; 
4]; 


ST{O]; 
ST{1]; 
1.0€; 


++) 
= B[i+0* 
++) 
= BN[i + 0 * 


4]; 


4]; 


++) 
= B[i+i1* 
++) 
= BN[i + i * 


4]; 


4]; 


* 


tl +1) / 6.0£; 
+ 4) / 6.0£; 


3 * tl + 1) 
) 
3) / 6.0€; 
) / 6.0€£; 
3) / 6.0£; 
) / 6.0€; 


/ 6.0€; 
/ 6.0£; 


Re ETE Pe BS ee 


fBlending[k J 
fBlending[k + 1] 
fBlending[k + 2] 
k += 4; 


f/f --- (1, 1) --- 
for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
£Blending [k++] 
for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
£Blending [k++] 


fBlending[k J 
fBlending[k + 1] 
fBlending[k + 2] 
k += 4; 


Wo 


// --- (0, 2) --- 
for(i = 0; i < 4; 
£Blending [k++] 
for(i = 0; i < 4; 
£Blending [k++] 


for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
£Blending [k++] 


fBlending[k ] 
fBlending[k + 1] 
fBlending[k + 2] 
k += 4; 


// --- (1, 2) --- 
for(i = 0; i < 4; 
f£Blending [k++] 
for(i = 0; i < 4; 
£Blending [k++] 


for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
f£Blending [k++] 


£Blending [k j 
fBlending{k + 1] 
fBlending[{k + 2] 
k += 4; 


/f --- (0, 3) --- 
for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
fBlending [k++] 
for(i = 0; i < 4; 
fBlending [k++] 


£Blending[k ] 
fBlending[k + 1] 
fBlending[{k + 2] 
k += 4; 


Wow th 


{fe =a= ALS) -se= 


it+) 


=B [i 


i++) 


= BN[i 


i++) 


= B [i 


i++) 


= BN[i 


ST{1}; 
ST{1]; 
1.0€£; 


itt) 


= By [% 


itt) 


= BN[i 


i++) 


= B [i 


i++) 


= BN[i 


ST[2]; 
ST[0]; 
1.0€£; 


i++) 


4); 


4); 


4); 


4]; 


4); 
4); 


4); 


4); 


= B[i + 1 * 4]; 


i++) 


= BN[i + 1 * 4]; 


i++) 


= Bli + 2 * 4]; 


i++) 


= BN[i + 2 * 4]; 


ST[2]; 
ST[1]; 
1.0€; 


i++) 


= B [i 


i++) 


= BN[i 


i++) 


= B fi 


it+) 


= BN[i 


sT[3]; 
ST[O]; 
1.O€; 


4]; 


4]; 


4]; 


4); 


for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 1 * 4]; 

for(i = 0; i < 4; i++) 
fBlending{k++] = BN[i + 1 * 4]; 


for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 3 * 4]; 
for(i = 0; i < 4; i++) 


fBlending [k++] = BN[i + 3 * 4]; 
fBlending[k ] = ST[3]; 
fBlending[(k + 1] = ST[1i]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
| 7 eiatatatatatatatatatatatatatatatetatetaiaetaaaataatantatatataatataaatanatamnaaentatateatetatatataanatel 
/f --- (1, 0) =-- 


for(i = 0; i < 4; i++) 
fBlending{k++] = B [i + 1 * 4]; 


for(i = 0; i < 4; i++) 
fBlending{k++] = BN[i + 1 * 4]; 
for(i = 0; i < 4; i+t) 
fBlending[k++] = B [i + 0 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 0 * 4]; 
£Blending[k } = ST[(0]; 
fBlending[k + 1] = ST[1]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
// --- (2, 0) --- 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 2 * 4]; 
for(i = 0; i-< 4; i++) 
fBlending[k++] = BN[i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 0 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 0 * 4]; 
fBlending[k } SST [0.)5 
fBlending{k + 1] = ST[2]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
// --- (1, 1) --- 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 1 * 4]; 
for(i = 0; i < 4; itt) 
fBlending[k++] = BN[i + 1 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[{k++] = B [i + 1 * 4]; 
for(i = 0; i < 4; i++) 


fBlending{k++] = BN[i + 1 * 4]; 


£Blending[k ] = st{1j; 
fBlending[k + 1] = ST{1]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
// --- (2, 1) --- 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[{k++] = BN[i + 2 * 4]; 
for(i = 0; i < 4; i++) 


fBlending[k++] = B [i + 1 * 4]; 


SD eae Fee ee ee ee 


O; i < 4; i++) 
fBlending[k++] = BN[i + 1 * 4]; 


for(i 


fBlending[k ] = ST[1]; 
fBlending[k + 1] = ST[2]; 
fBlending[k + 2] = 1.0€; 
k += 4; 

/f --- (1, 2) --- 


for(i = 0; i < 4; i++) 
fBlending{k++] = B [i + 1 * 4]; 


for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 1 * 4]; 
for(i = 0; i < 4; i++) 


fBlending[k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 2 * 4]; 


fBlending[k ] = ST[2]; 
fBlending[k + 1] = ST[1]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
/f --- (2, 2) --- 
for(i = 0; i < 4; itt) 
fBlending[k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[{k++] = BN[i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending{k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; i++) 


fBlending[({k++] = BN[i + 2 * 4]; 


£Blending[k ] = stT(2]; 
fBlending[k + 1] = ST(2]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
// --- (1, 3) --- 
for(i = 0; i < 4; i++) 
fBlending[(k++] = B [i + 1 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 1 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 3 * 4]; 
for(i = 0; i < 4; i++) 


£Blending[k++] = BN[i + 3 * 4]; 


£Blending[k ) = ST[3]; 
fBlending{k + 1] = ST[1]; 
fBlending{k + 2] = 1.0f; 
k += 4; 

// --- (2, 3) --- 


for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 2 * 4]; 


for(i = 0; i < 4; i++) 

fBlending[k++] = BN[i + 2 * 4}; 
for(i = 0; i < 4; i++) 

fBlending[{k++] = B {i + 3 * 4]; 
for(i = 0; i < 4; i++) 


fBlending[k++] = BN[i + 3 * 4]; 


fBlending[k ] = ST[3]; 
fBlending([k + 1] = ST[2]; 
fBlending[{k + 2] = 1.0f; 


k += 4; 


ffo--- (2, 0) --- 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
fBlending[k ] = ST[O]; 
fBlending(k + 1] = ST[2]; 
fBlending(k + 2] = 1.0€; 
k += 4; 
// --- (3, 0) --- 
for(i = 0; i < 4; i++) 
£fBlending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; i++) 
£fBlending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
fBlending[k ] = ST[0O]; 
fBlending[k + 1] = ST[3]; 
fBlending[k + 2] = 1.0f£; 
k += 4; 
/{ --- (2, 1) --- 
for(i = 0; i < 4; i++) 
fBlending [k++] 
for(i = 0; i < 4; i++) 
fBlending [k++] 
for(i = 0; i < 4; i++) 
fBlending [k++] 
for(i = 0; i < 4; i++) 
fBlending [k++] 
f£Blending[k ) = st(1]; 
fBlending[k + 1] = ST[2]; 
fBlending[k + 2] = 1.0£; 
k += 4; 
tf s== A435. 1)>Ss- 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; i++) 
£Blending [k++] 
for(i = 0; i < 4; itt) 
fBlending [k++] 
fBlending [k ] = ST[1]; 
fBlending[{k + 1] = ST[3]; 
fBlending[k + 2] = 1.0f; 
k += 4; 
// --- (2, 2) --- 
for(i = 0; i < 4; i++) 
fBlending [k++] 


for(i = 0; i < 4; i++) 


BN[i 


4]; 


4); 


4]; 


4]; 


4]; 


4); 


4); 
4); 


4}; 


4); 


4]; 


4]; 


4]; 


4]; 


4); 
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- MES) EEE SEPIA NEE ON eg ee EN aT Ue VED ager eT eral 
« . 
bs . 
fBlending[{k++] = BN[i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 2 * 4]; 
f£Blending[k ] = ST{[2]; 
fBlending[k + 1] = ST[2]; 
fBlending[k + 2] = 1.0€; 
k += 4; 
// --- (3, 2) --- 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 3 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN[i + 3 * 4]; 
for(i = 0; i < 4; i++) 
fBlending{k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending(k++] = BN[{i + 2 * 4]; 
fBlending[k ]} = ST[2]; 
fBlending[k + 1] = ST[3]; 
fBlending[(k + 2] = 1.0€; 
k += 4; 
Lf === AZ; 3) ==s 
for(i = 0; i < 4; itt) 
fBlending[k++] = B [i + 2 * 4]; 
for(i = 0; i < 4; it+) 
fBlending[k++] = BN[i + 2 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 3 * 4]; 
for(i = 0; i < 4; i++) 
fBlending{k++] = BN[i + 3 * 4]; 
fBlending[k ) = ST(3]; 
fBlending[(k + 1] = ST[2]; 
fBlending[k + 2] = 1.0£; 
k += 4; 
ff -n-- (3, 3) --- 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 3 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = BN([i + 3 * 4]; 
for(i = 0; i < 4; i++) 
fBlending[k++] = B [i + 3 * 4]; 
for(i = 0; i < 4; itt) 
£Blending[k++] = BN[i + 3 * 4]; 
fBlending[k ] = ST(3]; 
fBlending[k + 1] = ST{3]; 
fBlending[k + 2] = 1.0€; 
k += 4; 
} 


void CreateViewingMatrix(sceVu0FVECTOR view, 
sceVu0FVECTOR interest, 
sceVu0FMATRIX persMat) { 


float viewLength, upLength, 


rightLength, f£FOV; 


sceVu0FMATRIX viewMat, transMat, projMat, screenMat; 


sceVu0FVECTOR viewVector, upVector, rightVector, tmpVector1; 
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sceVvu0SubVector (viewVector, interest, view); 
viewLength = sqrtf(viewVector{0] * viewVector[0] + 
viewVector[1] * viewVector[1] + 
viewVector[2] * viewVector[2]); 
scevu0Normalize(viewVector, viewVector) ; 


upVector[0] = 0.0f; 
upVector[1] = 1.0€£; 
upVector[2] = 0.0f; 
upVector[3] = 1.0f; 


scevu0OuterProduct (tmpVectorl, viewVector, upVector); 
scevu0Normalize(tmpVector1, tmpVectori) ; 

scevu0OuterProduct (upVector, tmpVector1, viewVector) ; 
scevu0OuterProduct (rightVector, upVector, viewVector) ; 


fFOV = FOV * PI / 180.0€; 
upLength = viewLength * sin(fFOV * 0.5) / cos(fFOV * 0.5); 
rightLength = ASPECT * upLength; 


scevu0ScaleVector(viewVector, viewVector, 1.0f / viewLength) ; 
scevu0ScaleVector(upVector, upVector, 1.0£ / upLength); 
scevu0ScaleVector(rightVector, rightVector, 1.0f / rightLength) ; 


memset (viewMat, 0, sizeof (sceVuOFMATRIX) ); 
viewMat [0] [0] 


viewMat [1] [0] 
viewMat [2] [0] 


rightVector [0]; 
rightVector[1]; 
rightVector [2]; 


viewMat [0] [1] 
viewMat [1] [1] 
viewMat [2] {1] 


upVector [0]; 
upVector[1]; 
upVector [2]; 


viewMat [0] [2] 
viewMat [1] [2] 
viewMat [2] [2] 


viewVector[0]; 
viewVvector[1]; 
viewVector[2]; 


viewMat[3]{3] = 1.0€£; 


memset (transMat, 0, sizeof (sceVuOFMATRIX) ); 
transMat[0][0] = 1.0£; 
transMat[1)[1] = 1.0€; 
transMat(2)[2] = 1.0£; 
transMat[3][3] = 1.0f; 


- interest[0]; 
- interest[1]; 
- interest[2]; 


transMat [3] [0] 
transMat [3] [1] 
transMat [3] [2] 


ou il 


scevu0MulMatrix(projMat, transMat, viewMat) ; 


projMat [0] [3] 
projMat [1] [3] 
projMat [2] [3] 


projMat [0] [2]; 
projMat[1} [2]; 
projMat [2] [2]; 


screenMat[(0}[0] = SCREEN_WIDTH / 2.0f; 


screenMat[1][0] = 0.0f; 

screenMat[2][0] = 0.0f; 

screenMat[3][0] = SCREEN_WIDTH / 2.0f£ + SCREEN_OFFSET_X; 
screenMat[0J)[1] = 0.0f; 

screenMat[(1][1] = - SCREEN_HEIGHT / 2.0f; 
screenMat[(2][1] = 0.0f; 

screenMat[(3][1] = SCREEN_HEIGHT / 2.0f£ + SCREEN_OFFSET_Y; 
screenMat[0][(2] = 0.0f; 

screenMat[1](2] = 0.0f; 

screenMat(2][2] = -100000.0f; 

screenMat[(3][2] = 100000000.0f; 

screenMat[(0][3] = 0.0f; 

screenMat[1][3]}] = 0.0f; 
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screenMat [2] [3] 
screenMat [3] [3] 


Ul 
rR 
(a) 
Ph 


sceVu0MulMatrix(persMat, screenMat, projMat); 


// --- MATRIX for PARTICLE --- 
B_matrix[0] persMat [0] [0 
B_matrix[1] persMat [0] [1 
B_matrix[2] persMat [0] [2 
B_matrix[3] persMat [0] [3 


B_matrix[4] 
B_matrix[5] 
B_matrix[6] 
B_matrix[7] 


persMat {1] [0 
persMat[1) [1 
persMat [1] [2 
persMat [1] [3 


B_matrix[8} 
B_matrix[9] 
B_matrix[{10} 
B_matrix[i1] 


persMat {2] [0 
persMat [2] [1 


ou 


persMat [2] [ 


B_matrix[12] 
B_matrix[13] 
B_matrix[14] 
B_matrix[15] 


persMat [3] [ 
persMat [3] [ 
persMat [3] [ 
persMat [3] [ 


void SetViewPosition(sceVu0FVECTOR view, 


#define RADIUS 30.0£ 


view[0] = 

view[1] = RADIUS * sinf (phi); 
view[2] = RADIUS * cosf(phi) * 
view[3] = 1.0£; 


void MoveLight(u_int frame) { 


float f1, *fLight; 


]; 
1]; 
diz 
l; 


ae 
1; 
]; 
Li 


} 3 
]; 


persMat [2] [2]; 


3]; 


01; 
1]; 
2); 
3]; 


RADIUS * cosf(phi) * cosf(theta); 


sinf (theta) ; 


static float theta = 0.0f, dtheta = 0.03f; 


theta += dtheta; 
if(theta > 0.8 * PI) dtheta 
if(theta < 0.2 * PI) dtheta 


"ou 


fLight = (float*) &My_light; 
f1 = cosf(theta); 

fLight[0] = f1; 
£1 = sinf (theta); 

fLight[4] = £1; 


-0.03£; 
0.03£; 


float theta, 
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float phi) 


